home *** CD-ROM | disk | FTP | other *** search
/ Personal Computer World 2005 October / PCWOCT05.iso / Software / FromTheMag / XAMPP 1.4.14 / xampp-win32-1.4.14-installer.exe / xampp / php / pear / Math / test / testMath_Integer.php < prev   
PHP Script  |  2004-03-24  |  2KB  |  67 lines
  1. <?php
  2.  
  3. // $Id: testMath_Integer.php,v 1.2 2003/01/02 01:58:29 jmcastagnetto Exp $
  4. // Example of use of Math_Integer
  5.  
  6. echo date('\* r')."\n";
  7. echo '* PHP version: '.phpversion()."\n";
  8. echo '* Zend version: '.zend_version()."\n";
  9.  
  10. // force to use a particular lib
  11. // comment all out to get automatic selection
  12. //define ('MATH_INTLIB', 'gmp');
  13. //define ('MATH_INTLIB', 'bcmath');
  14. //define ('MATH_INTLIB', 'std');
  15.  
  16. include_once 'Math/IntegerOp.php';
  17. if (MATH_INTLIB == 'gmp' || MATH_INTLIB == 'bcmath') {
  18.     $i1 = new Math_Integer('333333333333333333333333');
  19.     $i2 = new Math_Integer('111111111111111111111111');
  20. } else {
  21.     $i1 = new Math_Integer('33333');
  22.     $i2 = new Math_Integer('11111');
  23. }
  24. $i3 = new Math_Integer(6);
  25.  
  26. echo '* Using lib: '.MATH_INTLIB."\n";
  27.  
  28. echo 'i1 = '.$i1->toString()."\n";
  29. echo 'i2 = '.$i2->toString()."\n";
  30. echo 'i3 = '.$i3->toString()."\n";
  31.  
  32. $res = Math_IntegerOp::add($i1, $i2);
  33. echo 'i1 + i2 = '.$res->toString()."\n";
  34.  
  35. $res = Math_IntegerOp::sub($i1, $i2);
  36. echo 'i1 - i2 = '.$res->toString()."\n";
  37.  
  38. $res = Math_IntegerOp::sub($i2, $i1);
  39. echo 'i2 - i1 = '.$res->toString()."\n";
  40.  
  41. $res = Math_IntegerOp::mul($i1, $i2);
  42. echo 'i1 * i2 = '.$res->toString()."\n";
  43.  
  44. $res = Math_IntegerOp::div($i1, $i3);
  45. echo 'i1 / i3 = '.$res->toString()."\n";
  46.  
  47. $res = Math_IntegerOp::mod($i2, $i3);
  48. echo 'i1 % i3 = '.$res->toString()."\n";
  49.  
  50. $res = Math_IntegerOp::neg($i1);
  51. echo 'neg(i1) = '.$res->toString()."\n";
  52.  
  53. echo 'sign(neg(i1)) = '.Math_IntegerOp::sign($res)."\n";
  54. echo 'sign(neg(0)) = '.Math_IntegerOp::sign(new Math_Integer(0))."\n";
  55. echo 'sign(i2) = '.Math_IntegerOp::sign($i2)."\n";
  56.  
  57. echo 'compare(i1, i2) = '.Math_IntegerOp::compare($i1, $i2)."\n";
  58. echo 'compare(i3, i3) = '.Math_IntegerOp::compare($i3, $i3)."\n";
  59. echo 'compare(i2, i1) = '.Math_IntegerOp::compare($i2, $i1)."\n";
  60.  
  61. $res = Math_IntegerOp::abs(Math_IntegerOp::neg($i2));
  62. echo 'abs(neg(i2)) = '.$res->toString()."\n";
  63.  
  64. // vim: ts=4:sw=4:et:
  65. // vim6: fdl=1:
  66. ?>
  67.